# 1 "/opt/topspin/exp/stan/nmr/lists/pp/user/noesypr1dwet2"
;noesypr1dwet2
;avance-version (Serge Akoka 13/09/2012)
;1D version of noesyphpr
;with presaturation during relaxation delay and mixing time and wet
;
;$CLASS=HighRes
;$DIM=1D
;$TYPE=
;$SUBTYPE=
;$COMMENT=


# 1 "/opt/topspin/exp/stan/nmr/lists/pp/Avance.incl" 1
;Avance3.incl
;   for AV III
;
;avance-version (07/12/14)
;
;$CLASS=HighRes Incl
;$COMMENT=





























































































































































;$Id: Avance3.incl,v 1.6.2.2 2007/12/14 16:06:46 ber Exp $
# 13 "/opt/topspin/exp/stan/nmr/lists/pp/user/noesypr1dwet2" 2

# 1 "/opt/topspin/exp/stan/nmr/lists/pp/Grad.incl" 1
;Grad2.incl  -  include file for Gradient Spectroscopy
;   for 1
;
;avance-version (07/01/17)
;
;$CLASS=HighRes Incl
;$COMMENT=



















define list<gradient> EA=<EA>



;$Id: Grad2.incl,v 1.12 2007/01/22 14:22:35 ber Exp $
# 14 "/opt/topspin/exp/stan/nmr/lists/pp/user/noesypr1dwet2" 2



define delay WETWAIT


"d11=30m"
"d12=20u"
"d13=4u"



"WETWAIT=2m-d16"


"acqt0=-(p1*6/3.1416)-4u"

"sp7=sp1"
"sp8=sp1-0.5"
"sp9=sp1+0.6"
"sp10=sp1"


# 1 "mc_line 37 file /opt/topspin/exp/stan/nmr/lists/pp/user/noesypr1dwet2 expanding definition part of mc command before ze"
define delay MCWRK
define delay MCREST
"MCWRK = 0.333333*30m"
"MCREST = 30m - 30m"
    dccorr
# 37 "/opt/topspin/exp/stan/nmr/lists/pp/user/noesypr1dwet2"
1 ze
# 1 "mc_line 37 file /opt/topspin/exp/stan/nmr/lists/pp/user/noesypr1dwet2 expanding definition of mc command after ze"
# 38 "/opt/topspin/exp/stan/nmr/lists/pp/user/noesypr1dwet2"
# 1 "mc_line 38 file /opt/topspin/exp/stan/nmr/lists/pp/user/noesypr1dwet2 expanding start label for mc command"
2 MCWRK  * 2
LBLF0, MCWRK
  MCREST
# 39 "/opt/topspin/exp/stan/nmr/lists/pp/user/noesypr1dwet2"
  50u setnmr3|0 setnmr0|34|32|33 ctrlgrad 0
  d12 pl0:f1
  d13
  (p11:sp7 ph5):f1
  4u
  p16:gp21
  d16 pl0:f1
  (p11:sp8 ph6):f1
  4u
  p16:gp22
  d16 pl0:f1
  (p11:sp9 ph6):f1
  4u
  p16:gp23
  d16 pl0:f1
  (p11:sp10 ph6):f1
  4u
  p16:gp24
  d16
  20u setnmr3^0 setnmr0^34^32^33 ctrlgrad 7
  d12 pl9:f1
  d1 cpds1:f1
  4u do:f1
  d12 pl1:f1
  p1 ph1
  4u
  p1 ph2
  d12 pl9:f1
  d8 cw:f1 ph29
  4u do:f1
  d12 pl1:f1
  4u setnmr3^0 setnmr0^34^32^33 ctrlgrad 7
  p1 ph3
  go=2 ph31
# 1 "mc_line 73 file /opt/topspin/exp/stan/nmr/lists/pp/user/noesypr1dwet2 expanding mc command in line"
  MCWRK wr #0
  MCWRK zd 
  lo to LBLF0 times td0

  MCWRK
# 74 "/opt/topspin/exp/stan/nmr/lists/pp/user/noesypr1dwet2"
exit


ph1=0 2 
ph2=0 0 0 0 0 0 0 0 2 2 2 2 2 2 2 2
ph3=0 0 2 2 1 1 3 3
ph5=0
ph6=1
ph29=0
ph31=0 2 2 0 1 3 3 1 2 0 0 2 3 1 1 3

;pl0 : 120 dB
;pl1 : f1 channel - power level for pulse (default)
;sp1: f1 channel - shaped pulse
;        powerlevel for 90 degree pulse
;sp7: f1 channel - shaped pulse
;sp8: f1 channel - shaped pulse
;sp9: f1 channel - shaped pulse
;sp10: f1 channel - shaped pulse
;pl9 : f1 channel - power level for presaturation
;p1 : f1 channel -  90 degree high power pulse
;d1 : relaxation delay; 1-5 * T1
;d8 : mixing time
;d11: delay for disk I/O                             [30 msec]
;d12: delay for power switching                      [20 usec]
;NS: 8 * n, total number of scans: NS * TD0
;DS: 4

;use gradient ratio:    gp21 : gp22 : gp23 : gp24
;                         80 :   40 :   20 :   10

;for z-only gradients:
;gpz21: 80%
;gpz22: 40%
;gpz23: 20%
;gpz24: 10%

;use gradient files:   
;gpnam21: SINE.100
;gpnam22: SINE.100
;gpnam23: SINE.100
;gpnam24: SINE.100

;$Id: noesypr1d,v 1.9.2.1 2007/09/14 16:17:35 ber Exp $
